Public Class CInvoice
    Private _intInvoiceID As Integer
    Private _strSeqInvoiceID As String
    Private _intVendorID As Integer
    Private _dtInvoiceDate As Date
    Private _dblInvoiceAmount As Double
    Private _dblTotalTaxes As Double
    Private _dblTotalDiscount As Double
    Private _dblGrossAmount As Double
    Private _dtDueDate As Date
    Private _strRemark As String

    Public Sub New()

    End Sub

    Public Property InvoiceID() As Integer
        Get
            Return _intInvoiceID
        End Get
        Set(ByVal value As Integer)
            _intInvoiceID = value
        End Set
    End Property

    Public Property SeqBillID() As String
        Get
            Return _strSeqInvoiceID
        End Get
        Set(ByVal value As String)
            _strSeqInvoiceID = value
        End Set
    End Property
    Public Property VendorID() As Integer
        Get
            Return _intVendorID
        End Get
        Set(ByVal value As Integer)
            _intVendorID = value
        End Set
    End Property
    Public Property InvoiceDate() As Date
        Get
            Return _dtInvoiceDate
        End Get
        Set(ByVal value As Date)
            _dtInvoiceDate = value
        End Set
    End Property
    Public Property InvoiceAmount() As Double
        Get
            Return _dblInvoiceAmount
        End Get
        Set(ByVal value As Double)
            _dblInvoiceAmount = value
        End Set
    End Property


    Public Property TotalTaxes() As Double
        Get
            Return _dblTotalTaxes
        End Get
        Set(ByVal value As Double)
            _dblTotalTaxes = value
        End Set
    End Property
    Public Property TotalDiscount() As Double
        Get
            Return _dblTotalDiscount
        End Get
        Set(ByVal value As Double)
            _dblTotalDiscount = value
        End Set
    End Property
    Public Property GrossAmount() As Double
        Get
            Return _dblGrossAmount
        End Get
        Set(ByVal value As Double)
            _dblGrossAmount = value
        End Set
    End Property

    Public Property DueDate() As Date
        Get
            Return _dtDueDate
        End Get
        Set(ByVal value As Date)
            _dtDueDate = value
        End Set
    End Property
    Public Property Remark() As String
        Get
            Return _strRemark
        End Get
        Set(ByVal value As String)
            _strRemark = value
        End Set
    End Property

End Class
